object dlgBGMusic: TdlgBGMusic Left = 906 Top = 271 Width = 458 Height = 427 BorderIcons = [biSystemMenu, biMaximize] Caption = 'Background Music Playlist' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter ShowHint = True OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 359 Width = 450 Height = 34 Hint = 'Specifies that the current music selection will be used as the d' + 'efault when creating new projects' Align = alBottom BevelOuter = bvNone TabOrder = 1 object btnOK: TsitBitBtn Left = 254 Top = 3 Width = 91 Height = 25 Anchors = [akRight, akBottom] Caption = 'OK' Default = True ModalResult = 1 TabOrder = 1 OnClick = btnOKClick Images = frmMain.ImageList1 ImageIndex = 0 end object btnCancel: TsitBitBtn Left = 350 Top = 3 Width = 91 Height = 25 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 2 Images = frmMain.ImageList1 ImageIndex = 1 end object btnSetAsDefault: TsitBitBtn Left = 9 Top = 3 Width = 91 Height = 25 Anchors = [akLeft, akBottom] Cancel = True Caption = 'Set as Default...' TabOrder = 0 OnClick = btnSetAsDefaultClick Images = frmMain.ImageList1 end end object Panel2: TPanel Left = 0 Top = 0 Width = 450 Height = 359 Align = alClient BevelOuter = bvNone BorderWidth = 8 TabOrder = 0 object Panel3: TPanel Left = 8 Top = 8 Width = 434 Height = 343 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 0 object Panel4: TPanel Left = 313 Top = 2 Width = 119 Height = 339 Align = alRight BevelOuter = bvNone TabOrder = 1 object btnHelp2: TSpeedButton Left = 98 Top = 0 Width = 20 Height = 20 Flat = True Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF FF00FFFF00FFFF00FFE6CEC3E3CDC3DFCBC2DBC7BEDCC4B9E5C9BBFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFE8CDC1ECE0DBEAEBECE4E7ECD9 D4D4D1CCCDCBCBCEC7C0BFC8B7B1E5C9BBFF00FFFF00FFFF00FFFF00FFFF00FF EACFC3F4F1EEF4FAFDE6CDC2D79674D58C65D48B64D08F6ECEB0A4C2C0C2C4B7 B4DCC3B7FF00FFFF00FFFF00FFE8CCBFF8F4F3FBFFFFDDA283CB6128CD652EF6 E1D5F2D4C5CC6128CD642CCF9679C7C4C7C8BCB9E5C9BBFF00FFFF00FFF4E8E2 FFFFFFE3AF93C95B22CC662FCD6935E9BCA4E6B399CC6731CC6730CD6027D29B 7FCDCCCFD8C5BEFF00FFEACFC3FEFDFDF7E6DCD0703BCD6732CC6530D07240E6 B398E0A281CC652ECD6933CD6731CD6A34D6C2B9D5D1D1E5C9BBEFD9D0FFFFFF E9BA9ED17239D27541CD6A33D37848FEFAF7FAF0EBCF6F3CCA6129CD6A35CC60 28D7A085DFE1E5E4CBC0F2E0D9FFFFFFE4AC87D68046D6804AD47943CF6F39ED C7B3FFFFFFF0D5C7D07443CB642DCB622AD68E68E8ECF1E5D0C6F2E0D8FFFFFF E8B68EDB8D53DB8B55D7834CD57D47D37741ECC6B0FFFFFFF7E7DFD17544C95C 23D8916BF1F6FAE8D2C9EED8CEFFFFFFF0CEB0DF965CE09B67E19E6FDA8B55D7 814AD2753DECC5AEFFFFFFE4AF92C75519E0AB8FF6FBFFE9D1C6EED8CEFDFBFB FBF2E7E4A46AF5DCC7FFFFFEE8B690D98549D4793CE5AE8BFFFFFFE9BBA1CE68 30F2E2D9F6F4F3E9D1C6FF00FFF4E7E0FFFFFFF2D2B3EEC39AFFFFFFFDF9F6EF CAB0EEC9ADFDF8F5FEFBF9DD9465E6B497FFFFFFEFDED6FF00FFFF00FFECD4C9 FAF2EFFFFFFFF1D0ADF0CEA8FAEEE2FDF9F5FDF8F3F8E7DAE8B28BEABD9CFFFF FFF6EDE9EFDED6FF00FFFF00FFFF00FFECD4C9F9F1EEFFFFFFF9EADAF3D4B4F1 D0AEEFCAA9EFC8A8F7E2D2FFFFFFF7EEEAE9CFC2FF00FFFF00FFFF00FFFF00FF FF00FFECD4C9F6ECE7FAF6F5FEFDFCFFFEFDFEFDFCFDFCFCFBF6F5F5E7E0F5E7 E0FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEBD3C8EBD3C8EE D8CFEED7CDECD4C9ECD4C9FF00FFFF00FFFF00FFFF00FFFF00FF} OnClick = btnHelp2Click end object bkmkup: TsitBitBtn Tag = -1 Left = 0 Top = 181 Width = 113 Height = 25 Hint = 'Move the selected song further up the playlist' Anchors = [akLeft, akBottom] Caption = 'Move File Up ' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = bkmkupClick Images = frmMain.ilstButtons16 ImageIndex = 38 end object bkmkdown: TsitBitBtn Tag = 1 Left = 0 Top = 206 Width = 113 Height = 25 Hint = 'Move the selected song further down the playlist' Anchors = [akLeft, akBottom] Caption = 'Move File Down' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = bkmkupClick Images = frmMain.ilstButtons16 ImageIndex = 39 end object btnremovebkmk: TsitBitBtn Left = 0 Top = 237 Width = 113 Height = 25 Hint = 'Remove the selected file from the playlist' Anchors = [akLeft, akBottom] Caption = 'Remove File' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = btnremovebkmkClick Images = frmMain.ilstButtons16 ImageIndex = 23 end object btnclearall: TsitBitBtn Left = 0 Top = 268 Width = 113 Height = 25 Hint = 'Clear all files from your playlist' Anchors = [akLeft, akBottom] Caption = 'Clear All' ParentShowHint = False ShowHint = True TabOrder = 6 OnClick = btnclearallClick Images = frmMain.ImageList1 ImageIndex = 18 end object btnBGMusic: TsitBitBtn Left = 0 Top = 119 Width = 113 Height = 25 Hint = 'Click this button to browse for sound files to add to your playl' + 'ist' Anchors = [akLeft, akBottom] Caption = 'Add Sound File...' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = btnBGMusicClick Images = frmMain.ImageList1 ImageIndex = 8 end object btnPlay: TsitBitBtn Left = 0 Top = 38 Width = 113 Height = 25 Hint = 'Play the selected sound file' Caption = 'Play Sound File' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = btnPlayClick Images = frmMain.ilstButtons16 ImageIndex = 40 end object MediaPlayer1: TMediaPlayer Left = 40 Top = 0 Width = 29 Height = 30 VisibleButtons = [btPlay] Visible = False TabOrder = 7 end object btnRecord: TsitBitBtn Left = 0 Top = 150 Width = 113 Height = 25 Hint = 'Allows you to record your own voice to insert into your slidesho' + 'w' Anchors = [akLeft, akBottom] Caption = 'Record Now...' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = btnRecordClick Images = frmMain.ilstButtons16 ImageIndex = 41 end end object Panel5: TPanel Left = 2 Top = 2 Width = 311 Height = 339 Align = alClient BevelOuter = bvNone BorderWidth = 8 TabOrder = 0 object Label1: TLabel Left = 8 Top = 8 Width = 295 Height = 31 Align = alTop AutoSize = False Caption = 'This is a list of the music files which will be played while a s' + 'lideshow is running' WordWrap = True end object lbxBGMusic: TListBox Left = 8 Top = 39 Width = 295 Height = 254 Hint = 'The list of music files which will be played during a slideshow' Align = alClient ItemHeight = 18 MultiSelect = True ParentShowHint = False ShowHint = True Style = lbOwnerDrawFixed TabOrder = 0 OnDrawItem = lbxBGMusicDrawItem OnMouseUp = lbxBGMusicMouseUp end object Panel6: TPanel Left = 8 Top = 293 Width = 295 Height = 38 Align = alBottom BevelOuter = bvNone TabOrder = 1 object lblDuration: TLabel Left = 0 Top = 5 Width = 52 Height = 13 Caption = 'Duration: 0' end object chkLoopBGMusic: TCheckBox Left = 1 Top = 23 Width = 213 Height = 17 Hint = 'If the specified music files are shorter than the slideshow leng' + 'th then the music will be repeated' Caption = 'Loop slideshow music' Checked = True State = cbChecked TabOrder = 0 end end end end end object dlgOpenMusicFile: TOpenDialog Options = [ofHideReadOnly, ofAllowMultiSelect, ofFileMustExist, ofEnableSizing] Left = 392 Top = 8 end object drpForm: TDropFileTarget Dragtypes = [dtCopy] GetDataOnEnter = False OnDrop = drpFormDrop Left = 322 Top = 10 end end